* term/vt100.el (vt100-wide-mode): Fix :init-value keyword (bug#6620).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 282c039551fa0d0a4d73bf6be93b3c28d3208ca4..fb7fe709d6c7fb03f7dcabcb0d2308e17851e154 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-07-22  Lawrence Mitchell  <wence@gmx.li>
+
+       * term/vt100.el (vt100-wide-mode): Fix :init-value keyword (bug#6620).
+
 2010-07-21  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp.el (tramp-get-ls-command)

diff --git a/lisp/term/vt100.el b/lisp/term/vt100.el
index 017c976ed512020f2ab7f32ccc7725a0da86d048..24561fe835fabe8ad83d933af0df8f06d7a0abb3 100644 (file)
--- a/lisp/term/vt100.el
+++ b/lisp/term/vt100.el
@@ -45,7 +45,7 @@
   "Toggle 132/80 column mode for vt100s.
 With positive argument, switch to 132-column mode.
 With negative argument, switch to 80-column mode."
-  :global t :initial-value (= (frame-width) 132)
+  :global t :init-value (= (frame-width) 132)
   (send-string-to-terminal (if vt100-wide-mode "\e[?3h" "\e[?3l"))
   (set-frame-width terminal-frame (if vt100-wide-mode 132 80)))